home *** CD-ROM | disk | FTP | other *** search
/ Belgian Amiga Club - ADF Collection / BS1 part 26.zip / BS1 part 26 / Powervisor v1.10b disk1.adf / s / pv / ExtraAliases < prev    next >
Text File  |  1991-09-15  |  185b  |  8 lines
  1. ;Define a new command to compute the facultaty of its argument
  2. ;Usage :
  3. ;    < fact 5
  4. ;    > 00000078 , 120
  5.  
  6. alias _fact 'void if(([])==1,1,{_fact ([])-1}*([]))'
  7. alias fact 'disp {_fact []}'
  8.